home *** CD-ROM | disk | FTP | other *** search
Text File | 1996-05-01 | 20.5 KB | 833 lines | [TEXT/MPS ] |
- ;
- ; File: Collections.a
- ;
- ; Contains: Collection Manager Interfaces
- ;
- ; Version: Technology: Copland
- ; Release: Universal Interfaces 3.0d3 on Copland DR1
- ;
- ; Copyright: © 1984-1996 by Apple Computer, Inc. All rights reserved.
- ;
- ; Bugs?: If you find a problem with this file, send the file and version
- ; information (from above) and the problem description to:
- ;
- ; Internet: apple.bugs@applelink.apple.com
- ; AppleLink: APPLE.BUGS
- ;
- ;
- IF &TYPE('__COLLECTIONS__') = 'UNDEFINED' THEN
- __COLLECTIONS__ SET 1
-
- IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
- include 'Types.a'
- ENDIF
- IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
- include 'MixedMode.a'
- ENDIF
- IF &TYPE('__MEMALLOCATORS__') = 'UNDEFINED' THEN
- include 'MemAllocators.a'
- ENDIF
- ; ***********
- ; Constants
- ; ***********
- ; Convenience constants for functions which optionally return values
-
- kCollectionDontWantTag EQU 0
- kCollectionDontWantId EQU 0
- kCollectionDontWantSize EQU 0
- kCollectionDontWantAttributes EQU 0
- kCollectionDontWantIndex EQU 0
- kCollectionDontWantData EQU 0
- ; attributes bits
-
- kCollectionNoAttributes EQU $00000000 ; no attributes bits set
- kCollectionAllAttributes EQU $FFFFFFFF ; all attributes bits set
- kCollectionUserAttributes EQU $0000FFFF ; user attributes bits
- kCollectionDefaultAttributes EQU $40000000 ; default attributes - unlocked, persistent
- ;
- ; Attribute bits 0 through 15 (entire low word) are reserved for use by the application.
- ; Attribute bits 16 through 31 (entire high word) are reserved for use by the Collection Manager.
- ; Only bits 31 (kCollectionLockBit) and 30 (kCollectionPersistenceBit) currently have meaning.
- ;
-
- kCollectionUser0Bit EQU 0
- kCollectionUser1Bit EQU 1
- kCollectionUser2Bit EQU 2
- kCollectionUser3Bit EQU 3
- kCollectionUser4Bit EQU 4
- kCollectionUser5Bit EQU 5
- kCollectionUser6Bit EQU 6
- kCollectionUser7Bit EQU 7
- kCollectionUser8Bit EQU 8
- kCollectionUser9Bit EQU 9
- kCollectionUser10Bit EQU 10
- kCollectionUser11Bit EQU 11
- kCollectionUser12Bit EQU 12
- kCollectionUser13Bit EQU 13
- kCollectionUser14Bit EQU 14
- kCollectionUser15Bit EQU 15
- kCollectionReserved0Bit EQU 16
- kCollectionReserved1Bit EQU 17
- kCollectionReserved2Bit EQU 18
- kCollectionReserved3Bit EQU 19
- kCollectionReserved4Bit EQU 20
- kCollectionReserved5Bit EQU 21
- kCollectionReserved6Bit EQU 22
- kCollectionReserved7Bit EQU 23
- kCollectionReserved8Bit EQU 24
- kCollectionReserved9Bit EQU 25
- kCollectionReserved10Bit EQU 26
- kCollectionReserved11Bit EQU 27
- kCollectionReserved12Bit EQU 28
- kCollectionReserved13Bit EQU 29
- kCollectionPersistenceBit EQU 30
- kCollectionLockBit EQU 31
- ; attribute masks
-
- kCollectionUser0Mask EQU $00000001
- kCollectionUser1Mask EQU $00000002
- kCollectionUser2Mask EQU $00000004
- kCollectionUser3Mask EQU $00000008
- kCollectionUser4Mask EQU $00000010
- kCollectionUser5Mask EQU $00000020
- kCollectionUser6Mask EQU $00000040
- kCollectionUser7Mask EQU $00000080
- kCollectionUser8Mask EQU $00000100
- kCollectionUser9Mask EQU $00000200
- kCollectionUser10Mask EQU $00000400
- kCollectionUser11Mask EQU $00000800
- kCollectionUser12Mask EQU $00001000
- kCollectionUser13Mask EQU $00002000
- kCollectionUser14Mask EQU $00004000
- kCollectionUser15Mask EQU $00008000
- kCollectionReserved0Mask EQU $00010000
- kCollectionReserved1Mask EQU $00020000
- kCollectionReserved2Mask EQU $00040000
- kCollectionReserved3Mask EQU $00080000
- kCollectionReserved4Mask EQU $00100000
- kCollectionReserved5Mask EQU $00200000
- kCollectionReserved6Mask EQU $00400000
- kCollectionReserved7Mask EQU $00800000
- kCollectionReserved8Mask EQU $01000000
- kCollectionReserved9Mask EQU $02000000
- kCollectionReserved10Mask EQU $04000000
- kCollectionReserved11Mask EQU $08000000
- kCollectionReserved12Mask EQU $10000000
- kCollectionReserved13Mask EQU $20000000
- kCollectionPersistenceMask EQU $40000000
- kCollectionLockMask EQU $80000000
- ; *********
- ; Types
- ; *********
- ; abstract data type for a collection
-
-
- ; collection member 4 byte tag
- ; typedef FourCharCode CollectionTag
-
- IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
- ENDIF
- IF FOR_SYSTEM8_PREEMPTIVE THEN
- ENDIF
- ; *******************************************
- ; ************ Public interfaces ************
- ; *******************************************
- IF FOR_SYSTEM7_AND_SYSTEM8_PREEMPTIVE THEN
- ;
- ; pascal Collection NewCollection(void )
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _NewCollection
- moveq #0,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION NewCollection
- ENDIF
-
- ;
- ; pascal void DisposeCollection(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _DisposeCollection
- moveq #1,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION DisposeCollection
- ENDIF
-
- ;
- ; pascal Collection CloneCollection(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CloneCollection
- moveq #2,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CloneCollection
- ENDIF
-
- ;
- ; pascal SInt32 CountCollectionOwners(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CountCollectionOwners
- moveq #3,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CountCollectionOwners
- ENDIF
-
- ;
- ; pascal Collection CopyCollection(Collection srcCollection, Collection dstCollection)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CopyCollection
- moveq #4,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CopyCollection
- ENDIF
-
- ;
- ; pascal SInt32 GetCollectionDefaultAttributes(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetCollectionDefaultAttributes
- moveq #5,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetCollectionDefaultAttributes
- ENDIF
-
- ;
- ; pascal void SetCollectionDefaultAttributes(Collection c, SInt32 whichAttributes, SInt32 newAttributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _SetCollectionDefaultAttributes
- moveq #6,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION SetCollectionDefaultAttributes
- ENDIF
-
- ;
- ; pascal SInt32 CountCollectionItems(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CountCollectionItems
- moveq #7,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CountCollectionItems
- ENDIF
-
- ;
- ; pascal OSErr AddCollectionItem(Collection c, CollectionTag tag, SInt32 id, SInt32 itemSize, void *itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _AddCollectionItem
- moveq #8,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION AddCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr GetCollectionItem(Collection c, CollectionTag tag, SInt32 id, SInt32 *itemSize, void *itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetCollectionItem
- moveq #9,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr RemoveCollectionItem(Collection c, CollectionTag tag, SInt32 id)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _RemoveCollectionItem
- moveq #10,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION RemoveCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr SetCollectionItemInfo(Collection c, CollectionTag tag, SInt32 id, SInt32 whichAttributes, SInt32 newAttributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _SetCollectionItemInfo
- moveq #11,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION SetCollectionItemInfo
- ENDIF
-
- ;
- ; pascal OSErr GetCollectionItemInfo(Collection c, CollectionTag tag, SInt32 id, SInt32 *index, SInt32 *itemSize, SInt32 *attributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetCollectionItemInfo
- moveq #12,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetCollectionItemInfo
- ENDIF
-
- ;
- ; pascal OSErr ReplaceIndexedCollectionItem(Collection c, SInt32 index, SInt32 itemSize, void *itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _ReplaceIndexedCollectionItem
- moveq #13,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION ReplaceIndexedCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr GetIndexedCollectionItem(Collection c, SInt32 index, SInt32 *itemSize, void *itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetIndexedCollectionItem
- moveq #14,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetIndexedCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr RemoveIndexedCollectionItem(Collection c, SInt32 index)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _RemoveIndexedCollectionItem
- moveq #15,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION RemoveIndexedCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr SetIndexedCollectionItemInfo(Collection c, SInt32 index, SInt32 whichAttributes, SInt32 newAttributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _SetIndexedCollectionItemInfo
- moveq #16,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION SetIndexedCollectionItemInfo
- ENDIF
-
- ;
- ; pascal OSErr GetIndexedCollectionItemInfo(Collection c, SInt32 index, CollectionTag *tag, SInt32 *id, SInt32 *itemSize, SInt32 *attributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetIndexedCollectionItemInfo
- moveq #17,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetIndexedCollectionItemInfo
- ENDIF
-
- ;
- ; pascal Boolean CollectionTagExists(Collection c, CollectionTag tag)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CollectionTagExists
- moveq #18,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CollectionTagExists
- ENDIF
-
- ;
- ; pascal SInt32 CountCollectionTags(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CountCollectionTags
- moveq #19,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CountCollectionTags
- ENDIF
-
- ;
- ; pascal OSErr GetIndexedCollectionTag(Collection c, SInt32 tagIndex, CollectionTag *tag)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetIndexedCollectionTag
- moveq #20,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetIndexedCollectionTag
- ENDIF
-
- ;
- ; pascal SInt32 CountTaggedCollectionItems(Collection c, CollectionTag tag)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _CountTaggedCollectionItems
- moveq #21,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION CountTaggedCollectionItems
- ENDIF
-
- ;
- ; pascal OSErr GetTaggedCollectionItem(Collection c, CollectionTag tag, SInt32 whichItem, SInt32 *itemSize, void *itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetTaggedCollectionItem
- moveq #22,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetTaggedCollectionItem
- ENDIF
-
- ;
- ; pascal OSErr GetTaggedCollectionItemInfo(Collection c, CollectionTag tag, SInt32 whichItem, SInt32 *id, SInt32 *index, SInt32 *itemSize, SInt32 *attributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetTaggedCollectionItemInfo
- moveq #23,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetTaggedCollectionItemInfo
- ENDIF
-
- ;
- ; pascal void PurgeCollection(Collection c, SInt32 whichAttributes, SInt32 matchingAttributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _PurgeCollection
- moveq #24,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION PurgeCollection
- ENDIF
-
- ;
- ; pascal void PurgeCollectionTag(Collection c, CollectionTag tag)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _PurgeCollectionTag
- moveq #25,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION PurgeCollectionTag
- ENDIF
-
- ;
- ; pascal void EmptyCollection(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _EmptyCollection
- moveq #26,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION EmptyCollection
- ENDIF
-
- ENDIF
- IF FOR_SYSTEM7_AND_SYSTEM8_COOPERATIVE THEN
- ;
- ; pascal OSErr FlattenCollection(Collection c, CollectionFlattenUPP flattenProc, void *refCon)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _FlattenCollection
- moveq #27,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION FlattenCollection
- ENDIF
-
- ;
- ; pascal OSErr FlattenPartialCollection(Collection c, CollectionFlattenUPP flattenProc, void *refCon, SInt32 whichAttributes, SInt32 matchingAttributes)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _FlattenPartialCollection
- moveq #28,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION FlattenPartialCollection
- ENDIF
-
- ;
- ; pascal OSErr UnflattenCollection(Collection c, CollectionFlattenUPP flattenProc, void *refCon)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _UnflattenCollection
- moveq #29,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION UnflattenCollection
- ENDIF
-
- ;
- ; pascal CollectionExceptionUPP GetCollectionExceptionProc(Collection c)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetCollectionExceptionProc
- moveq #30,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetCollectionExceptionProc
- ENDIF
-
- ;
- ; pascal void SetCollectionExceptionProc(Collection c, CollectionExceptionUPP exceptionProc)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _SetCollectionExceptionProc
- moveq #31,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION SetCollectionExceptionProc
- ENDIF
-
- ;
- ; pascal Collection GetNewCollection(SInt16 collectionID)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetNewCollection
- moveq #32,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetNewCollection
- ENDIF
-
- ENDIF
- IF FOR_SYSTEM8_PREEMPTIVE THEN
- ;
- ; extern OSStatus NewCollectionFromAllocator(MemAllocatorRef allocator, Collection *c)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION NewCollectionFromAllocator
- ENDIF
-
- ;
- ; extern OSStatus GetCollectionItemData(Collection c, CollectionTag tag, UInt32 id, ByteCount sizeAllowed, ByteCount *sizeReturned, void *itemData)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION GetCollectionItemData
- ENDIF
-
- ;
- ; extern OSStatus GetIndexedCollectionItemData(Collection c, UInt32 index, ByteCount sizeAllowed, ByteCount *sizeReturned, void *itemData)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION GetIndexedCollectionItemData
- ENDIF
-
- ;
- ; extern OSStatus GetTaggedCollectionItemData(Collection c, CollectionTag tag, UInt32 whichItem, ByteCount sizeAllowed, ByteCount *sizeReturned, void *itemData)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION GetTaggedCollectionItemData
- ENDIF
-
- ;
- ; extern OSStatus GetFlattenedCollectionSize(Collection c, ByteCount *size)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION GetFlattenedCollectionSize
- ENDIF
-
- ;
- ; extern OSStatus GetFlattenedPartialCollectionSize(Collection c, UInt32 whichAttributes, UInt32 matchingAttributes, ByteCount *size)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION GetFlattenedPartialCollectionSize
- ENDIF
-
- ;
- ; extern OSStatus FlattenCollectionToBuffer(Collection c, void *dataPtr, ByteCount sizeAllowed, ByteCount *sizeFlattened)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION FlattenCollectionToBuffer
- ENDIF
-
- ;
- ; extern OSStatus FlattenPartialCollectionToBuffer(Collection c, UInt32 whichAttributes, UInt32 matchingAttributes, void *dataPtr, ByteCount sizeAllowed, ByteCount *sizeFlattened)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION FlattenPartialCollectionToBuffer
- ENDIF
-
- ;
- ; extern OSStatus UnflattenCollectionFromBuffer(Collection c, void *dataPtr, ByteCount size)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION UnflattenCollectionFromBuffer
- ENDIF
-
- ;
- ; extern OSStatus FlattenCollectionPreemptive(Collection c, CollectionFlattenPreemptiveProcPtr flattenProc, void *refCon)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION FlattenCollectionPreemptive
- ENDIF
-
- ;
- ; extern OSStatus FlattenPartialCollectionPreemptive(Collection c, CollectionFlattenPreemptiveProcPtr flattenProc, void *refCon, UInt32 whichAttributes, UInt32 matchingAttributes)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION FlattenPartialCollectionPreemptive
- ENDIF
-
- ;
- ; extern OSStatus UnflattenCollectionPreemptive(Collection c, CollectionFlattenPreemptiveProcPtr flattenProc, void *refCon)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION UnflattenCollectionPreemptive
- ENDIF
-
- ;
- ; extern CollectionExceptionPreemptiveProcPtr GetCollectionExceptionProcPreemptive(Collection c)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION GetCollectionExceptionProcPreemptive
- ENDIF
-
- ;
- ; extern OSStatus SetCollectionExceptionProcPreemptive(Collection c, CollectionExceptionPreemptiveProcPtr exceptionProc)
- ;
- IF GENERATINGCFM THEN
- IMPORT_CFM_FUNCTION SetCollectionExceptionProcPreemptive
- ENDIF
-
- ENDIF
- IF FOR_SYSTEM7_AND_SYSTEM8_DEPRECATED THEN
- ; ********************************************************************
- ; ************* Utility routines for handle-based access *************
- ; ********************************************************************
- ;
- ; pascal OSErr AddCollectionItemHdl(Collection aCollection, CollectionTag tag, SInt32 id, Handle itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _AddCollectionItemHdl
- moveq #33,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION AddCollectionItemHdl
- ENDIF
-
- ;
- ; pascal OSErr GetCollectionItemHdl(Collection aCollection, CollectionTag tag, SInt32 id, Handle itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetCollectionItemHdl
- moveq #34,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetCollectionItemHdl
- ENDIF
-
- ;
- ; pascal OSErr ReplaceIndexedCollectionItemHdl(Collection aCollection, SInt32 index, Handle itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _ReplaceIndexedCollectionItemHdl
- moveq #35,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION ReplaceIndexedCollectionItemHdl
- ENDIF
-
- ;
- ; pascal OSErr GetIndexedCollectionItemHdl(Collection aCollection, SInt32 index, Handle itemData)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _GetIndexedCollectionItemHdl
- moveq #36,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION GetIndexedCollectionItemHdl
- ENDIF
-
- ;
- ; pascal OSErr FlattenCollectionToHdl(Collection aCollection, Handle flattened)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _FlattenCollectionToHdl
- moveq #37,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION FlattenCollectionToHdl
- ENDIF
-
- ;
- ; pascal OSErr UnflattenCollectionFromHdl(Collection aCollection, Handle flattened)
- ;
- IF ¬ GENERATINGCFM THEN
- Macro
- _UnflattenCollectionFromHdl
- moveq #38,D0
- dc.w $ABF6
- EndM
- ELSE
- IMPORT_CFM_FUNCTION UnflattenCollectionFromHdl
- ENDIF
-
- ENDIF
- IF OLDROUTINENAMES THEN
-
- dontWantTag EQU 0
- dontWantId EQU 0
- dontWantSize EQU 0
- dontWantAttributes EQU 0
- dontWantIndex EQU 0
- dontWantData EQU 0
-
- noCollectionAttributes EQU $00000000
- allCollectionAttributes EQU $FFFFFFFF
- userCollectionAttributes EQU $0000FFFF
- defaultCollectionAttributes EQU $40000000
-
- collectionUser0Bit EQU 0
- collectionUser1Bit EQU 1
- collectionUser2Bit EQU 2
- collectionUser3Bit EQU 3
- collectionUser4Bit EQU 4
- collectionUser5Bit EQU 5
- collectionUser6Bit EQU 6
- collectionUser7Bit EQU 7
- collectionUser8Bit EQU 8
- collectionUser9Bit EQU 9
- collectionUser10Bit EQU 10
- collectionUser11Bit EQU 11
- collectionUser12Bit EQU 12
- collectionUser13Bit EQU 13
- collectionUser14Bit EQU 14
- collectionUser15Bit EQU 15
- collectionReserved0Bit EQU 16
- collectionReserved1Bit EQU 17
- collectionReserved2Bit EQU 18
- collectionReserved3Bit EQU 19
- collectionReserved4Bit EQU 20
- collectionReserved5Bit EQU 21
- collectionReserved6Bit EQU 22
- collectionReserved7Bit EQU 23
- collectionReserved8Bit EQU 24
- collectionReserved9Bit EQU 25
- collectionReserved10Bit EQU 26
- collectionReserved11Bit EQU 27
- collectionReserved12Bit EQU 28
- collectionReserved13Bit EQU 29
- collectionPersistenceBit EQU 30
- collectionLockBit EQU 31
-
- collectionUser0Mask EQU $00000001
- collectionUser1Mask EQU $00000002
- collectionUser2Mask EQU $00000004
- collectionUser3Mask EQU $00000008
- collectionUser4Mask EQU $00000010
- collectionUser5Mask EQU $00000020
- collectionUser6Mask EQU $00000040
- collectionUser7Mask EQU $00000080
- collectionUser8Mask EQU $00000100
- collectionUser9Mask EQU $00000200
- collectionUser10Mask EQU $00000400
- collectionUser11Mask EQU $00000800
- collectionUser12Mask EQU $00001000
- collectionUser13Mask EQU $00002000
- collectionUser14Mask EQU $00004000
- collectionUser15Mask EQU $00008000
- collectionReserved0Mask EQU $00010000
- collectionReserved1Mask EQU $00020000
- collectionReserved2Mask EQU $00040000
- collectionReserved3Mask EQU $00080000
- collectionReserved4Mask EQU $00100000
- collectionReserved5Mask EQU $00200000
- collectionReserved6Mask EQU $00400000
- collectionReserved7Mask EQU $00800000
- collectionReserved8Mask EQU $01000000
- collectionReserved9Mask EQU $02000000
- collectionReserved10Mask EQU $04000000
- collectionReserved11Mask EQU $08000000
- collectionReserved12Mask EQU $10000000
- collectionReserved13Mask EQU $20000000
- collectionPersistenceMask EQU $40000000
- collectionLockMask EQU $80000000
- ENDIF
- ENDIF ; __COLLECTIONS__
-
-